home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / submenu / 00164.ls < prev    next >
Encoding:
Text File  |  1995-03-29  |  438 b   |  16 lines
  1. on startMovie
  2.   global boxclick, QuitResult, game1level, castoffset, rolllist, fhinder, mysoundlevel
  3.   if value(game1level) = 0 then
  4.     newcomer()
  5.   end if
  6.   set boxclick to EMPTY
  7.   set QuitResult to EMPTY
  8.   puppetSound(0)
  9.   set rolllist to [11, 9, 7, 17, 21, 29, 25, 33, 46]
  10.   set castoffset to the number of cast "lev11" - 1
  11.   if value(mysoundlevel) = 0 then
  12.     set mysoundlevel to 5
  13.   end if
  14.   set the soundLevel to mysoundlevel
  15. end
  16.